* lisp/replace.el (read-regexp): Use minibuffer-message in the minibuffer.

diff --git a/lisp/replace.el b/lisp/replace.el
index c9d41d3fa39aa4692a5293fa1f19dcc4e21d7be8..c5c24c7a36580b7dda3dab97f256f2ebc9aaae52 100644 (file)
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -968,10 +968,11 @@ respect this or not; see `read-regexp-case-fold-search'.)"
                                                        'inhibit-fold))))
                                      'inhibit-fold
                                    'fold))
-                           (message "Case folding is now %s"
-                                    (if (eq case-fold 'fold)
-                                        "on"
-                                      "off"))))
+                           (minibuffer-message
+                            "Case folding is now %s"
+                            (if (eq case-fold 'fold)
+                                "on"
+                              "off"))))
                  nil (or history 'regexp-history) suggestions t))
          (result (if (equal input "")
                     ;; Return the default value when the user enters